home *** CD-ROM | disk | FTP | other *** search
- object Form1: TForm1
- Left = 107
- Top = 125
- Width = 442
- Height = 213
- BorderIcons = [biSystemMenu, biMinimize]
- Caption = 'Virus Checking Assistant'
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- Icon.Data = {<image000.ico>}
- Menu = MainMenu1
- Position = poScreenCenter
- OnActivate = FormActivate
- OnClose = FormClose
- PixelsPerInch = 96
- TextHeight = 14
- object ListBox1: TListBox
- Left = 123
- Top = 8
- Width = 299
- Height = 142
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'Arial'
- Font.Style = []
- ItemHeight = 14
- ParentFont = False
- Sorted = True
- TabOrder = 0
- end
- object GetFiles: TBitBtn
- Left = 13
- Top = 13
- Width = 92
- Height = 22
- Hint =
- 'Click here to select ZIP and self extracting files to be virus c' +
- 'hecked'
- Caption = '&Get Files...'
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- TabOrder = 1
- OnClick = GetFilesClick
- Glyph.Data = {
- 78010000424D7801000000000000760000002800000020000000100000000100
- 04000000000000000000120B0000120B00000000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
- 55555555FFFFFFFFFF55555000000000055555577777777775F55500B8B8B8B8
- B05555775F555555575F550F0B8B8B8B8B05557F75F555555575550BF0B8B8B8
- B8B0557F575FFFFFFFF7550FBF0000000000557F557777777777500BFBFBFBFB
- 0555577F555555557F550B0FBFBFBFBF05557F7F555555FF75550F0BFBFBF000
- 55557F75F555577755550BF0BFBF0B0555557F575FFF757F55550FB700007F05
- 55557F557777557F55550BFBFBFBFB0555557F555555557F55550FBFBFBFBF05
- 55557FFFFFFFFF7555550000000000555555777777777755555550FBFB055555
- 5555575FFF7555555555570000755555555555777755555555550000}
- NumGlyphs = 2
- end
- object Process: TBitBtn
- Left = 13
- Top = 47
- Width = 92
- Height = 22
- Hint =
- 'Start the process to uncompress and virus check the selected fil' +
- 'e'
- Caption = ' &Process...'
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- TabOrder = 2
- OnClick = ProcessClick
- Glyph.Data = {
- 78010000424D7801000000000000760000002800000020000000100000000100
- 04000000000000000000120B0000120B00000000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555000000
- 000055555F77777777775555000FFFFFFFF0555F777F5FFFF55755000F0F0000
- FFF05F777F7F77775557000F0F0FFFFFFFF0777F7F7F5FFFFFF70F0F0F0F0000
- 00F07F7F7F7F777777570F0F0F0FFFFFFFF07F7F7F7F5FFFFFF70F0F0F0F0000
- 00F07F7F7F7F777777570F0F0F0FFFFFFFF07F7F7F7F5FFF55570F0F0F0F000F
- FFF07F7F7F7F77755FF70F0F0F0FFFFF00007F7F7F7F5FF577770F0F0F0F00FF
- 0F057F7F7F7F77557F750F0F0F0FFFFF00557F7F7F7FFFFF77550F0F0F000000
- 05557F7F7F77777775550F0F0000000555557F7F7777777555550F0000000555
- 55557F77777775555555000000055555555577777775555555550000}
- NumGlyphs = 2
- end
- object Quit: TBitBtn
- Left = 13
- Top = 115
- Width = 92
- Height = 21
- Hint = 'Click here to exit the program'
- Caption = ' E&xit '
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- TabOrder = 3
- OnClick = QuitClick
- Glyph.Data = {
- 78010000424D7801000000000000760000002800000020000000100000000100
- 04000000000000000000120B0000120B00000000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000
- 03333377777777777F333301BBBBBBBB033333773F3333337F3333011BBBBBBB
- 0333337F73F333337F33330111BBBBBB0333337F373F33337F333301110BBBBB
- 0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB
- 0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB
- 0333337F337F33337F333301110BBBBB0333337F337FF3337F33330111B0BBBB
- 0333337F337733337F333301110BBBBB0333337F337F33337F333301110BBBBB
- 0333337F3F7F33337F333301E10BBBBB0333337F7F7F33337F333301EE0BBBBB
- 0333337F777FFFFF7F33330000000000033333777777777773330000}
- NumGlyphs = 2
- end
- object Panel1: TPanel
- Left = 116
- Top = 0
- Width = 306
- Height = 151
- TabOrder = 4
- Visible = False
- object Label1: TLabel
- Left = 15
- Top = 68
- Width = 280
- Height = 12
- Alignment = taCenter
- AutoSize = False
- end
- object Edit1: TEdit
- Left = 13
- Top = 17
- Width = 282
- Height = 18
- TabStop = False
- AutoSize = False
- Color = clBtnFace
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- ReadOnly = True
- TabOrder = 0
- Text = 'Edit1'
- end
- object btnCancelZip: TBitBtn
- Left = 124
- Top = 118
- Width = 63
- Height = 21
- Caption = 'Cancel'
- TabOrder = 1
- OnClick = btnCancelZipClick
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000130B0000130B00000000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 3333333333FFFFF3333333333999993333333333F77777FFF333333999999999
- 33333337777FF377FF3333993370739993333377FF373F377FF3399993000339
- 993337777F777F3377F3393999707333993337F77737333337FF993399933333
- 399377F3777FF333377F993339903333399377F33737FF33377F993333707333
- 399377F333377FF3377F993333101933399377F333777FFF377F993333000993
- 399377FF3377737FF7733993330009993933373FF3777377F7F3399933000399
- 99333773FF777F777733339993707339933333773FF7FFF77333333999999999
- 3333333777333777333333333999993333333333377777333333}
- NumGlyphs = 2
- end
- object OvcMeter1: TOvcMeter
- Left = 13
- Top = 42
- Width = 282
- Height = 17
- ShowPercent = True
- UsedColor = clAqua
- UsedShadow = 16744448
- end
- object OvcMeter2: TOvcMeter
- Left = 13
- Top = 89
- Width = 282
- Height = 17
- ShowPercent = True
- UsedShadow = clTeal
- end
- end
- object OpenDialog1: TOpenDialog
- FileEditStyle = fsEdit
- Left = 72
- Top = 88
- end
- object ExecFile1: TExecFile
- ParentHWnd = 0
- Left = 40
- Top = 88
- end
- object MainMenu1: TMainMenu
- Left = 8
- Top = 88
- object Configure1: TMenuItem
- Caption = '&Setup...'
- Hint = 'Click here to setup default directories and program locations'
- ShortCut = 0
- OnClick = Configure1Click
- end
- object Help1: TMenuItem
- Caption = '&Help'
- ShortCut = 0
- object Helpon1: TMenuItem
- Caption = '&Help on Virus Checking Assistant...'
- ShortCut = 0
- OnClick = Helpon1Click
- end
- object About1: TMenuItem
- Caption = '&About...'
- ShortCut = 0
- OnClick = About1Click
- end
- end
- end
- object UnzipFile1: TUnzipFile
- OnMajorCallback = UnzipFile1MajorCallback
- OnMinorCallback = UnzipFile1MinorCallback
- IndexofItem = 0
- Options = []
- wUnzipSubOptions = []
- Top = 144
- end
- object RegFile1: TRegFile
- Key = 'Software\ZPAY\Compressed File Virus Checker'
- Left = 32
- Top = 144
- end
- object OvcController1: TOvcController
- EntryCommands.TableList = (
- 'Default'
- True
- ()
- 'WordStar'
- False
- ()
- 'Grid'
- False
- ())
- Left = 66
- Top = 141
- end
- object Scaler1: TScaler
- PixelsPerInch = 96
- Xdevelop = 640
- Ydevelop = 480
- ClientWidth = 434
- ClientHeight = 167
- LimitScale = No
- ScaleRuntime = False
- Left = 96
- Top = 144
- end
- end
-